
// AF1. Enrollment by Age Figure
// AF1. Enrollment by Age Figure
// AF1. Enrollment by Age Figure


// PRELIMINARIES

clear
set more off
set scheme s1mono


use JakielaOzierFernaldKnauer-hh-roster-enrollment.dta

// FIGURE PLOTTING SCHOOL ENROLLMENT BY AGE

gen agecell = floor(age/6)
bys agecell:  egen enrollment = mean(schoolyn)

local mypink "248 118 109"

twoway (bar enrollment agecell if agecell>=4 & agecell<=14, barw(0.8) bcolor("`mypink'")), ///
 ytitle("School Enrollment" " ") xtitle(" " "Age in Months") ///
 xlabel(4 "24" 5 "30" 6 "36" 7 "42" 8 "48" 9 "54" 10 "60" 11 "66" 12 "72" 13 "78" 14 "84")
 
graph export "out/AF1-enroll-by-age-bar.pdf", replace

